!qrtr_window   /rewritten 2/22/94/***VL/
!a,b,resolution
shadow on
resol 4*c
muly b
mulx a
Pen F_
material I_
cprism_ G_,H_,I_,
5,C_,
0,1,13+64,
0,0,900,
0,90,4013+64,
-1, 0, 8,
-1, 1, 8

rotx 90
mulx -1
rect 1,C_
roty 90
rect 1,C_
end